home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 090 / cmln1285.arc / ZBASIC2.LTG < prev   
Text File  |  1986-02-27  |  256b  |  10 lines
  1. zbasic. Listing 2ì
  2.  
  3. 1░ DEFIN╘ A-Z
  4. 2░ PRIN╘ TIME$
  5. 3░ FO╥ I=▒ T╧ 1000
  6. 4░ X#=X#+ABS(EXP(LOG(I))-SQR((I/1#)^2)+(2#/3#)*(I*3#/2#)-I)
  7. 6░ NEX╘ I
  8. 7░ PRIN╘ X#
  9. 80 PRINT TIME$
  10.